home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / BANZ.ZIP / banz.txt < prev   
Text File  |  1997-03-05  |  1KB  |  37 lines
  1. (banZ) by gza released 03.05.97
  2.  
  3. this is a simple cut and paste addon to ban someone with a reason.
  4. it really sucks but just put this in your %ver
  5.  
  6. + (banZ) .1 by gza
  7. to use this paste this stuff.
  8.  
  9. example of usage: 
  10. add ban: /+ban *!*@*.netcom.com netcom really sux
  11. remove ban: /-ban *!*@*.netcom.com
  12.  
  13. alias section
  14.  
  15. +ban {
  16.   if ($1 == $null) { echo -a (banZ) usage: /+ban <address> <reason> } | else {
  17.     .auser 15 $1
  18.     if (*2 == $null) set %br cause i can | else { set %br *2 }
  19.     write ban.ini $1 (banZ) ( $+ $adate $+ ) ( $+ *2
  20.     echo -a (banZ) added  $+ $1 $+  to ban list with reason " $+  $+ *2 $+  $+ "
  21.     halt
  22.   }
  23. }
  24. -ban {
  25.   if ($1 == $null) { echo -a (banZ) usage: /-ban <address> } else {
  26.     .ruser 15 $1
  27.     write -ds $+ $1 ban.ini
  28.     echo -a (banZ) removed  $+ $1 $+  from ban list
  29.     halt
  30.   }
  31. }
  32.  
  33.  
  34. remote section
  35.  
  36. 15:on join:#:{ if ($level($address($nick,6)) == 15) && ($me isop $chan) { /mode $chan +b $maddress($address($nick,5)) | /kick $chan $nick $read -s $+ $maddress($address($nick,5)) ban.ini | halt }
  37.